COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	PRECEDE
C00004 ENDMK
C⊗;
PRECEDE;
FUNC FUN; < F1, F2, F3, F4, F5, F6
FUNC PPP[SCR,LCS]; < F1, F2, F3, F4, F5, F6
COMMON TOOT   TOOT CLAR BRIT BUZZ;
COMMON REVRB;
*
REVRB 0 1;P2 23;END;
CLAR ;  < SAMSON BOX VERSION
P2 RH/18X18/4;
P3 C4;
P4 .9 ; P5 F2; 
   P6 F4;
P12 .1 ALL;
P13 FU/4/5;
P18 NU/0/1/2/3/4/5/6/7/8/9/10/11/12/13/
14/15/16/17/18/17/16/15/14/13/12/11/10/9/8/7/6/5/4/3/2/1/0/FINE;
P19 MICRO 18  ;
  DF P22;
P22 ALL .2 2,4  .8 1,1;
END;
BUZZ 0 0 13;
P2 RH/12X12/4;
P3 NO/C2/CS/D/DS/E/F/FS/G/GS/A/AS/B/C3;
P4 1   ; P5 F2;
 P6 F6;
P13 F4;
  DF P22;
END;
BRIT 0 20;
DUPL 3; P5 F2;
P4 MOVE /6 .01 1.2;
P2 1 .03 .15;
P3 MOV/3 C1 C7 C4 C4/3 C4 C4 C1 C8;
P13 .25 "F1" .25 "F4" .25 "F5" .25 "F5";
DF P22;
P22 MOVE/18 .8 5 5 10;
P12 MOVE/18 0 .1;
END;